/*
 *                    BioJava development code
 *
 * This code may be freely distributed and modified under the
 * terms of the GNU Lesser General Public Licence.  This should
 * be distributed with the code.  If you do not have a copy,
 * see:
 *
 *      http://www.gnu.org/copyleft/lesser.html
 *
 * Copyright for this code is held jointly by the individual
 * authors.  These should be listed in @author doc comments.
 *
 * For more information on the BioJava project and its aims,
 * or to join the biojava-l mailing list, visit the home page
 * at:
 *
 *      http://www.biojava.org/
 *
 * Created on 15.04.2004
 * @author Andreas Prlic
 *
 */



package dasregistry ;

import java.io.Serializable;
import java.net.MalformedURLException;
import java.util.List;
import java.util.Map;

import org.biojava.dasobert.dasregistry.*;
import org.biojava.services.das.registry.AutoActivation;
import org.biojava.services.das.registry.DasClient;
import org.biojava.services.das.registry.DasRegistry;
import org.biojava.services.das.registry.RegistryConfiguration;
import org.springframework.context.ApplicationContext;
import org.springframework.context.support.ClassPathXmlApplicationContext;



//for mail
import javax.mail.*                           ;
import javax.mail.internet.*                  ;
import java.util.Properties                   ;


/** a bean that takes care of sending emails to other people
 */
public class sendMailToFriendBean 
implements Serializable {
	
	private static final long serialVersionUID = -3877692969941528014L;
	
	//Map configuration;
	String sendmailhost;
	String serveradmin;
	String sendTo;
	String myName;
	String myEmail;
	String subject;
	String body;

	//DasRegistry dasregistryaxisclient;
	//String REGISTRY ;

	final static String[] hex = {
		"%00", "%01", "%02", "%03", "%04", "%05", "%06", "%07",
		"%08", "%09", "%0a", "%0b", "%0c", "%0d", "%0e", "%0f",
		"%10", "%11", "%12", "%13", "%14", "%15", "%16", "%17",
		"%18", "%19", "%1a", "%1b", "%1c", "%1d", "%1e", "%1f",
		"%20", "%21", "%22", "%23", "%24", "%25", "%26", "%27",
		"%28", "%29", "%2a", "%2b", "%2c", "%2d", "%2e", "%2f",
		"%30", "%31", "%32", "%33", "%34", "%35", "%36", "%37",
		"%38", "%39", "%3a", "%3b", "%3c", "%3d", "%3e", "%3f",
		"%40", "%41", "%42", "%43", "%44", "%45", "%46", "%47",
		"%48", "%49", "%4a", "%4b", "%4c", "%4d", "%4e", "%4f",
		"%50", "%51", "%52", "%53", "%54", "%55", "%56", "%57",
		"%58", "%59", "%5a", "%5b", "%5c", "%5d", "%5e", "%5f",
		"%60", "%61", "%62", "%63", "%64", "%65", "%66", "%67",
		"%68", "%69", "%6a", "%6b", "%6c", "%6d", "%6e", "%6f",
		"%70", "%71", "%72", "%73", "%74", "%75", "%76", "%77",
		"%78", "%79", "%7a", "%7b", "%7c", "%7d", "%7e", "%7f",
		"%80", "%81", "%82", "%83", "%84", "%85", "%86", "%87",
		"%88", "%89", "%8a", "%8b", "%8c", "%8d", "%8e", "%8f",
		"%90", "%91", "%92", "%93", "%94", "%95", "%96", "%97",
		"%98", "%99", "%9a", "%9b", "%9c", "%9d", "%9e", "%9f",
		"%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%a6", "%a7",
		"%a8", "%a9", "%aa", "%ab", "%ac", "%ad", "%ae", "%af",
		"%b0", "%b1", "%b2", "%b3", "%b4", "%b5", "%b6", "%b7",
		"%b8", "%b9", "%ba", "%bb", "%bc", "%bd", "%be", "%bf",
		"%c0", "%c1", "%c2", "%c3", "%c4", "%c5", "%c6", "%c7",
		"%c8", "%c9", "%ca", "%cb", "%cc", "%cd", "%ce", "%cf",
		"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7",
		"%d8", "%d9", "%da", "%db", "%dc", "%dd", "%de", "%df",
		"%e0", "%e1", "%e2", "%e3", "%e4", "%e5", "%e6", "%e7",
		"%e8", "%e9", "%ea", "%eb", "%ec", "%ed", "%ee", "%ef",
		"%f0", "%f1", "%f2", "%f3", "%f4", "%f5", "%f6", "%f7",
		"%f8", "%f9", "%fa", "%fb", "%fc", "%fd", "%fe", "%ff"
	};


	private Map getConfig(){
		RegistryConfiguration rconfig = new RegistryConfiguration();
		Map configuration = rconfig.getConfiguration();
		return configuration;
	}

	
	public sendMailToFriendBean(){
		

		
		//REGISTRY = (String) configuration.get("webserviceLocation");

		//URL url = getRegistryUrl();

		// switch between the two versions ...
		//dasregistryaxisclient = getRegistry();
		
		Map configuration = getConfig();
		serveradmin = (String) configuration.get("serveradmin");
		
		sendmailhost = (String)configuration.get("sendmailhost");
				
		sendTo = "";
		myName = "";
		myEmail = "";
		subject = "";
		body = "";
	}

	
	public DasClient[] getDasClients(){
		Map configuration = getConfig();
		DasClient[] clients = (DasClient[]) configuration.get("DASClients");
		return clients;
	}

	public void setSendTo(String sendTo) {
		System.out.println("setting sendTo " + sendTo);
		this.sendTo = sendTo;
	}
	public String getSendTo(){
		return sendTo;
	}

	public void setMyName(String myName) {
		this.myName = myName;
	}

	public String getMyName() {
		return myName;
	}

	public void setMyEmail(String myEmail) {
		this.myEmail = myEmail;
	}

	public String getMyEmail() {
		return myEmail ;
	}

	public String getSubject() {
		return subject;
	}


	public String getBody() {
		
		return body;
	}
	
	
	public String createMessageBody(DasSource ds, String auto_id){
		System.out.println("got to createMessageBody");
		ActivationURLCreator activCreator = new ActivationURLCreator();
		StringBuffer bodyBuffer=new StringBuffer();
		 String txt = "Hi\n";
		   txt +="This email has been sent to you by ( " + myEmail+") via the DAS - registration server at http://www.dasregistry.org . \n\n";
		bodyBuffer.append(txt);
		bodyBuffer.append("You might find the DAS-source "+ds.getNickname()+" interesting.\n\nFor more info about it, please proceed here:\nhttp://www.dasregistry.org/showdetails.jsp?auto_id="+auto_id+"\n");
		
			List<String> capabs = ds.getCapabilities();
			boolean canFeatures = false;
			for (int j = 0; j < capabs.size(); j++) {
				String capability = capabs.get(j);
				if (capability.equals("features"))
					canFeatures = true;
			}
			if (canFeatures) {
				String nickname = ds.getNickname();
				String url = ds.getUrl();
				DasCoordinateSystem[] coordSys = ds.getCoordinateSystem();

				AutoActivation[] aas = activCreator.getAllActivationURLs(ds
				.getUrl());
				for (int l = 0; l < aas.length; l++) {

					AutoActivation aa = aas[l];
					DasClient client = aa.getClient();			
		
		 try {
			bodyBuffer.append(" You can enable this DAS source in the "+ client.getName()+" client by pressing the following link:"+aa.getURL(ds)+"\n\n");
		} catch (MalformedURLException e) {
			e.printStackTrace();
		} 	
		
			}
			}
		return bodyBuffer.toString();
		
		
	}
	

	public void sendMail(DasSource ds,String auto_id, String email, String myEmail) 
	throws MessagingException
	{
		String[] to= new String[1];
		to[0] = sendTo;
		//Map configuration = getConfig();
		//String from = (String) configuration.get("serveradmin");
		//DasSource ds=this.getDasSource(auto_id);
		String subject="info about das-source"+ds.getNickname();
		//write whole of body on server so no room for spam posting messages
		String localBody=this.createMessageBody(ds, auto_id);
		postMail(to,subject,localBody,serveradmin);

	}

	

	/** return a DasRegistry object. Can be either the AxisClient to
	 * communicate via SOAP (axis) or the SQLRegistry class */
	private DasRegistry getRegistry(){

//		ApplicationContext context = new ClassPathXmlApplicationContext("config_dasregistry.xml");
//
//		DasRegistry registryClient = (DasRegistry) context.getBean("dasRegistryClient");
		ApplicationContext context = new ClassPathXmlApplicationContext("SpringDAO.xml");
		
			DasRegistry registryClient = (DasRegistry) context.getBean("registryBean");
		return registryClient ;
	}
	
	public DasSource getDasSource(String auto_id){
		DasRegistry dri = getRegistry() ;
		return dri.getDasSource(auto_id);
	}

	private void postMail( String recipients[ ], String subject, String message,String from ) throws MessagingException
	{

		boolean debug = false;
		
		//Set the host smtp address
		Properties props = new Properties();
		props.put("mail.smtp.host", sendmailhost);

		// create some properties and get the default Session
		Session session = Session.getDefaultInstance(props, null);
		session.setDebug(debug);

		// create a message
		Message msg = new MimeMessage(session);

		// set the from and to address
		InternetAddress addressFrom = new InternetAddress(from);
		msg.setFrom(addressFrom);

		InternetAddress[] addressTo = new InternetAddress[recipients.length]; 
		for (int i = 0; i < recipients.length; i++)
		{
			addressTo[i] = new InternetAddress(recipients[i]);
		}
		msg.setRecipients(Message.RecipientType.TO, addressTo);


		// Optional : You can also set your custom headers in the Email if you Want
		//msg.addHeader("MyHeaderName", "myHeaderValue");

		// Setting the Subject and Content Type
		msg.setSubject(subject);
		msg.setContent(message, "text/plain");
		Transport.send(msg);
	}

	/** copied from to http://www.w3.org/International/unescape.java 
	 * to learn more about URL encoding look at e.g. 
	 * http://www.blooberry.com/indexdot/html/topics/urlencoding.htm
	 * @author unknown
	 * @param s 
	 * @return the unescaped string
	 */
	public static String unescape(String s) {
		StringBuffer sbuf = new StringBuffer () ; 
		int l  = s.length() ;
		int ch = -1 ;
		int b, sumb = 0;
		for (int i = 0, more = -1 ; i < l ; i++) {
			/* Get next byte b from URL segment s */
			switch (ch = s.charAt(i)) {
			case '%':
				ch = s.charAt (++i) ;
				int hb = (Character.isDigit ((char) ch) 
						? ch - '0'
								: 10+Character.toLowerCase((char) ch) - 'a') & 0xF ;
				ch = s.charAt (++i) ;
				int lb = (Character.isDigit ((char) ch)
						? ch - '0'
								: 10+Character.toLowerCase ((char) ch)-'a') & 0xF ;
				b = (hb << 4) | lb ;
				break ;
			case '+':
				b = ' ' ;
				break ;
			default:
				b = ch ;
			}
			/* Decode byte b as UTF-8, sumb collects incomplete chars */
			if ((b & 0xc0) == 0x80) {			// 10xxxxxx (continuation byte)
				sumb = (sumb << 6) | (b & 0x3f) ;	// Add 6 bits to sumb
				if (--more == 0) sbuf.append((char) sumb) ; // Add char to sbuf
			} else if ((b & 0x80) == 0x00) {		// 0xxxxxxx (yields 7 bits)
				sbuf.append((char) b) ;			// Store in sbuf
			} else if ((b & 0xe0) == 0xc0) {		// 110xxxxx (yields 5 bits)
				sumb = b & 0x1f;
				more = 1;				// Expect 1 more byte
			} else if ((b & 0xf0) == 0xe0) {		// 1110xxxx (yields 4 bits)
				sumb = b & 0x0f;
				more = 2;				// Expect 2 more bytes
			} else if ((b & 0xf8) == 0xf0) {		// 11110xxx (yields 3 bits)
				sumb = b & 0x07;
				more = 3;				// Expect 3 more bytes
			} else if ((b & 0xfc) == 0xf8) {		// 111110xx (yields 2 bits)
				sumb = b & 0x03;
				more = 4;				// Expect 4 more bytes
			} else /*if ((b & 0xfe) == 0xfc)*/ {	// 1111110x (yields 1 bit)
				sumb = b & 0x01;
				more = 5;				// Expect 5 more bytes
			}
			/* We don't test if the UTF-8 encoding is well-formed */
		}
		return sbuf.toString() ;
	}


	/**
	 * Encode a string to the "x-www-form-urlencoded" form, enhanced
	 * with the UTF-8-in-URL proposal. This is what happens:
	 *
	 * <ul>
	 * <li><p>The ASCII characters 'a' through 'z', 'A' through 'Z',
	 *        and '0' through '9' remain the same.
	 *
	 * <li><p>The unreserved characters - _ . ! ~ * ' ( ) remain the same.
	 *
	 * <li><p>The space character ' ' is converted into a plus sign '+'.
	 *
	 * <li><p>All other ASCII characters are converted into the
	 *        3-character string "%xy", where xy is
	 *        the two-digit hexadecimal representation of the character
	 *        code
	 *
	 * <li><p>All non-ASCII characters are encoded in two steps: first
	 *        to a sequence of 2 or 3 bytes, using the UTF-8 algorithm;
	 *        secondly each of these bytes is encoded as "%xx".
	 * </ul>
	 *
	 * @param s The string to be encoded
	 * @return The encoded string
	 */
	public static String encode(String s)
	{
		StringBuffer sbuf = new StringBuffer();
		int len = s.length();
		for (int i = 0; i < len; i++) {
			int ch = s.charAt(i);
			if ('A' <= ch && ch <= 'Z') {		// 'A'..'Z'
				sbuf.append((char)ch);
			} else if ('a' <= ch && ch <= 'z') {	// 'a'..'z'
				sbuf.append((char)ch);
			} else if ('0' <= ch && ch <= '9') {	// '0'..'9'
				sbuf.append((char)ch);
			} else if (ch == ' ') {			// space
				sbuf.append('+');
			} else if (ch == '-' || ch == '_'		// unreserved
				|| ch == '.' || ch == '!'
					|| ch == '~' || ch == '*'
						|| ch == '\'' || ch == '('
							|| ch == ')') {
				sbuf.append((char)ch);
			} else if (ch <= 0x007f) {		// other ASCII
				sbuf.append(hex[ch]);
			} else if (ch <= 0x07FF) {		// non-ASCII <= 0x7FF
				sbuf.append(hex[0xc0 | (ch >> 6)]);
				sbuf.append(hex[0x80 | (ch & 0x3F)]);
			} else {					// 0x7FF < ch <= 0xFFFF
				sbuf.append(hex[0xe0 | (ch >> 12)]);
				sbuf.append(hex[0x80 | ((ch >> 6) & 0x3F)]);
				sbuf.append(hex[0x80 | (ch & 0x3F)]);
			}
		}
		return sbuf.toString();
	}


}
